From 9716c98b88336618d88a27c8f7f294266983bbfb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 8 Nov 2006 17:31:29 +0000 Subject: [PATCH] (remove-overlays): Call overlay-recenter. --- lisp/subr.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index cf09264e4b1..3fcdaaab753 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1960,6 +1960,8 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there." "Clear BEG and END of overlays whose property NAME has value VAL. Overlays might be moved and/or split. BEG and END default respectively to the beginning and end of buffer." + ;; This speeds up the loops over overlays. + (overlay-recented (point-max)) (unless beg (setq beg (point-min))) (unless end (setq end (point-max))) (if (< end beg) -- 2.30.2